home *** CD-ROM | disk | FTP | other *** search
/ The Final Frontier 9 / Final Frontier 9 (Disk 1 of 3).adf / S / Startup-Sequence next >
Text File  |  1995-06-27  |  2KB  |  62 lines
  1. ; LCARS Release 2.2 System Startup
  2. ; L.B. Elliott, Feb '95
  3. ; This version for Issue 8
  4. ; >2.0 Resident commands not with explicit path
  5.  
  6. NoBorder                    ; Borderless CLI please
  7. Echo "*e[32m"
  8.  
  9. C:MakeDir RAM:Env                ; Create ENV:
  10. C:MakeDir RAM:T                    ; Create T:
  11. C:Assign13 ENV: RAM:Env
  12. C:Assign13 T: RAM:T
  13.  
  14. C:ExecVer                    ; Get exec version
  15.  
  16. IF $ExecVer GE 39                ; >39 startup
  17.     Echo "Initialising LCARS environment for Amiga Release 3.x..."
  18.     C:SetPatch30 >NIL:
  19.     C:Assign20 LCARS[1]: SYS:LCARS
  20.     C:Assign20 LCARS[2]: "Disk 2:LCARS" DEFER
  21.     C:Assign20 LCARS[3]: "Disk 3:LCARS" DEFER
  22.   
  23. ELSE
  24.     IF $ExecVer NOT GE 36            ; <36 startup
  25.         Echo "Initialising LCARS environment for Amiga Release 1.x..."
  26.         SetPatch13 >NIL:
  27.         C:PPLibInit
  28.     C:FF >NIL: -0
  29.     C:Copy S:Startup13 T:            ; Assigns
  30.     C:Execute T:Startup13            ; Execute (reduces swaps)
  31.  
  32.     ELSE                    ; Here must be >=36, <39
  33.         C:Echo "Initialising LCARS environment for Amiga Release 2.x..."
  34.     C:SetPatch20 >NIL:
  35.         C:Assign20 LCARS[1]: SYS:LCARS
  36.     C:Assign20 LCARS[2]: "Disk 2:LCARS" DEFER
  37.     C:Assign20 LCARS[3]: "Disk 3:LCARS" DEFER
  38.    ENDIF
  39. ENDIF
  40.  
  41. C:PPLoadSeg >NIL:                ; Patch pp on
  42. C:PPColPatch >NIL: 4                ; Turn off decrunch colors
  43. C:AddBuffers DF0: 15
  44. C:SetMap GB
  45.  
  46. C:MakeDir RAM:LCARS_Data
  47. C:MakeDir RAM:LCARS_Data/MenuFile
  48. C:MakeDir RAM:LCARS_Data/Lists
  49.  
  50. C:Assign13 LCARS: SYS:LCARS
  51. C:Assign13 LCARS_Data: RAM:LCARS_Data
  52.  
  53. C:Copy LCARS:MenuFile/ LCARS_Data:MenuFile/ ALL QUIET
  54. C:Copy LCARS:Lists/#? LCARS_Data:Lists/ QUIET
  55.  
  56. Echo "LCARS Initialised. Activating..."
  57. LCARS:LCARS Contents.MF GL=Startup.GL ML
  58.  
  59. Echo "*nRebooting in 5 seconds..."
  60. Wait 3 SECS
  61. Reset
  62.